(name-last-kbd-macro): Reject empty cmd name.

diff --git a/lisp/macros.el b/lisp/macros.el
index 5bf6560e5e657fec3705260828997156f9cd64f5..fc79959e9f98a9e690fa3619f205e60627f79d23 100644 (file)
--- a/lisp/macros.el
+++ b/lisp/macros.el
@@ -45,6 +45,8 @@ Such a \"function\" cannot be called from Lisp, but it is a valid editor command
        (not (vectorp (symbol-function symbol)))
        (error "Function %s is already defined and not a keyboard macro."
              symbol))
+  (if (string-equal symbol "")
+      (error "No command name given"))
   (fset symbol last-kbd-macro))
 
 ;;;###autoload